home *** CD-ROM | disk | FTP | other *** search
/ Virtual Top Model / Virtual Top Model - Disc 1.iso / modulos / mod-1.dxr / 00015_modulo 2.ls < prev    next >
Encoding:
Text File  |  1997-04-01  |  573 b   |  23 lines
  1. on mouseUp
  2.   global sModuloDestino
  3.   if rollOver(21) then
  4.     set the member of sprite 21 to member "BtMod_A/2" of castLib "elementos graficos"
  5.     puppetSprite(21, 0)
  6.     updateStage()
  7.     set sModuloDestino to "MOD-2"
  8.     go("cambio")
  9.   end if
  10. end
  11.  
  12. on mouseDown
  13.   repeat while the stillDown
  14.     puppetSprite(21, 1)
  15.     if rollOver(21) then
  16.       set the member of sprite 21 to member "BtMod_B/2" of castLib "elementos graficos"
  17.     else
  18.       set the member of sprite 21 to member "BtMod_A/2" of castLib "elementos graficos"
  19.     end if
  20.     updateStage()
  21.   end repeat
  22. end
  23.